Outlook을 실행하고 ALT + F11 을 눌러 VBA 코드 창을 실행 Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) Dim objK As Recipient Set objK = Item.Recipients.Add(“user@abc.com”) objK.Type = olBCC objK.Resolve Set objK = Nothing End Sub